.key source/a,option
.bra {
.ket }


;This shell script creates the .map files for jpegAGA

;USAGE: CreateMap file

;NOTE: You need a directory JPEGTMP: on your hard disk
;      (and enough space on that partition)


FailAt 21

djpeg {source} JPEGTMP:temp.ppm

IF ERROR

  delete >NIL: JPEGTMP:temp.ppm
  echo "Fatal error: could not decode JPEG file."
  QUIT 20

ENDIF

ppm2aga JPEGTMP:temp.ppm {source}.map -jpegAGA {option}

IF ERROR
  delete >NIL: JPEGTMP:temp.ppm
  delete >NIL: {source}.map
  echo "Fatal error: could not create map file."
  QUIT 20
ENDIF

delete >NIL: JPEGTMP:temp.ppm
